object MainForm: TMainForm
  Left = 333
  Top = 100
  Caption = 'Simple text client'
  ClientHeight = 379
  ClientWidth = 532
  Color = clBtnFace
  Constraints.MinHeight = 300
  Constraints.MinWidth = 450
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 317
    Width = 532
    Height = 62
    Align = alBottom
    TabOrder = 0
    DesignSize = (
      532
      62)
    object Label3: TLabel
      Left = 88
      Top = 33
      Width = 3
      Height = 13
    end
    object Button1: TButton
      Left = 440
      Top = 21
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Send'
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 16
      Top = 21
      Width = 65
      Height = 25
      Caption = 'Add file'
      TabOrder = 1
      OnClick = Button2Click
    end
    object OleContainer1: TOleContainer
      Left = 304
      Top = 8
      Width = 41
      Height = 33
      AllowInPlace = False
      AllowActiveDoc = False
      Caption = 'OleContainer1'
      TabOrder = 2
    end
    object Button3: TButton
      Left = 136
      Top = 12
      Width = 137
      Height = 25
      Caption = 'Test textfetcher'
      TabOrder = 3
      Visible = False
      OnClick = Button3Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 532
    Height = 317
    Align = alClient
    TabOrder = 1
    DesignSize = (
      532
      317)
    object Label1: TLabel
      Left = 16
      Top = 16
      Width = 22
      Height = 13
      Caption = 'Host'
    end
    object Label2: TLabel
      Left = 16
      Top = 112
      Width = 47
      Height = 13
      Caption = 'Command'
    end
    object Label4: TLabel
      Left = 16
      Top = 160
      Width = 35
      Height = 13
      Caption = 'Params'
    end
    object Label5: TLabel
      Left = 298
      Top = 16
      Width = 48
      Height = 13
      Anchors = [akTop, akRight]
      Caption = 'Response'
    end
    object MemoResponse: TMemo
      Left = 296
      Top = 32
      Width = 219
      Height = 265
      Anchors = [akTop, akRight, akBottom]
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object MemoRequest: TMemo
      Left = 16
      Top = 176
      Width = 265
      Height = 121
      Anchors = [akLeft, akTop, akRight, akBottom]
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 1
    end
    object EditHost: TEdit
      Left = 16
      Top = 32
      Width = 265
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      TabOrder = 2
      Text = 'localhost'
    end
    object ComboBoxCommand: TComboBox
      Left = 16
      Top = 128
      Width = 265
      Height = 21
      Style = csDropDownList
      Anchors = [akLeft, akTop, akRight]
      DropDownCount = 20
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = 'ADDGROUP'
      OnChange = ComboBoxCommandChange
      Items.Strings = (
        'ADDGROUP'
        'ADDSTUD'
        'ADDTEACH'
        'ADDJOUR'
        'DELGROUP'
        'DELSTUD'
        'DELTEACH'
        'DELJOUR'
        'EDITGROUP'
        'EDITSTUD'
        'EDITTEACH'
        'EDITPASW'
        'GETGROUP'
        'GETSTUD'
        'GETTEACH'
        'HELP'
        'START'
        'STOP')
    end
    object RadioGroup1: TRadioGroup
      Left = 16
      Top = 65
      Width = 265
      Height = 41
      HelpContext = -1
      Caption = 'Command'
      Columns = 3
      ItemIndex = 2
      Items.Strings = (
        'Student'
        'Teacher'
        'Admin')
      TabOrder = 4
      OnClick = RadioGroup1Click
    end
  end
  object IdTCPClient1: TIdTCPClient
    ConnectTimeout = 0
    IPVersion = Id_IPv4
    Port = 0
    ReadTimeout = 1000000
    Left = 112
  end
  object SaveDialog1: TSaveDialog
    Left = 80
  end
  object OpenDialog1: TOpenDialog
    Left = 144
  end
  object IdAntiFreeze1: TIdAntiFreeze
    Left = 176
  end
  object ApplicationEvents1: TApplicationEvents
    Left = 208
  end
end
